﻿Namespace Sigortali.BeyazKimlik
	Module Functions

		Function SNoAra(ByVal Process As Token, ByVal sno As String) As Recordset
			Return Process.OpenSQL("select * from beyazkimlik where sno = @sno", sno)
		End Function

		Function KimlikAra(ByVal Process As Token, ByVal kimlik As String) As Recordset
			Return Process.OpenSQL("select * from beyazkimlik where kimlik = @kimlik", kimlik)
		End Function

	End Module
End Namespace
